Imports Security.Entities
Imports DataAccess.Base

Public Class UserDAO
    Inherits TableDAO(Of User)

    Public Sub New()
        Me.TableName = "Security_Users"
        Me.IDColumn = "UserId"
    End Sub

    Public Function GetByPassword(ByVal password As String) As User
        Dim query As String = String.Format("SELECT * FROM Security_Users WHERE Password = '{0}'", password)
        Return GetByQuery(query)
    End Function
End Class